home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1986 July
/
1986-07.d64
/
64 mode speed up
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
603b
|
19 lines
10 print"[147]this program only works on the 128 in 64 mode"
20 fori=49152to49258:readx:c=c+x:pokei,x:next
30 ifc<>12470thenprint"data error":end
40 sys 49152
50 data 120,173,105,192,141,18,208,173
60 data 17,208,41,127,141,17,208,169
70 data 129,141,26,208,169,192,160,32
80 data 141,21,3,140,20,3,88,96
90 data 173,25,208,141,25,208,41,1
100 data 208,3,76,49,234,173,18,208
110 data 205,106,192,176,14,172,106,192
120 data 140,18,208,169,0,141,48,208
130 data 76,78,192,172,105,192,140,18
140 data 208,169,1,141,48,208,104,168
150 data 104,170,104,64,120,169,234,141
160 data 21,3,169,49,141,20,3,169
170 data 0,141,48,208,141,26,208,88
180 data 96,50,250